﻿Namespace Widgets

    Public Class WidgetBase(Of TView As {Control})

        Private m_View As TView

        Public ReadOnly Property View() As TView
            Get
                Return m_View
            End Get
        End Property

        Public Sub New(ByVal View As TView)
            m_View = View
        End Sub

    End Class

End Namespace